﻿Imports EnvDTE80

Module Root

  Private application As DTE2
  Public ReadOnly Property CurrentApplication As DTE2
    Get
      Return application
    End Get
  End Property

  Public Sub RunAddin(app As DTE2)

    application = app

    Dim f = New FrmIntro()

    f.Show()

  End Sub
End Module
